home *** CD-ROM | disk | FTP | other *** search
/ Belgian Amiga Club - ADF Collection / BS1 part 47.7z / BS1 part 47 / HiSoft BASIC v1.04 (1989)(HiSoft)(Disk 2 of 2)[h Band].7z / HiSoft BASIC v1.04 (1989)(HiSoft)(Disk 2 of 2)[h Band].adf / Speech / speech1.bas < prev    next >
Encoding:
BASIC Source File  |  1988-12-03  |  280 b   |  16 lines
  1. Text$="Amiga"
  2.   Begin:
  3.     Speech%(0)=90+180*RND
  4.     Speech%(1)=RND
  5.     Speech%(2)=50+200*RND
  6.     Speech%(3)=RND
  7.     Speech%(4)=17000+10000*RND
  8.     Speech%(5)=40+24*RND
  9.     Speech%(6)=11*RND
  10.     Speech%(7)=0
  11.     Speech%(8)=0
  12.     
  13.     SAY TRANSLATE$(Text$),Speech%
  14.   GOTO Begin
  15.   
  16.